home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / ISSUE23 / CLINIC / DBCOMBOU.DFM / DBCOMBOU.txt
Text File  |  1997-04-27  |  972b  |  50 lines
  1. object Form1: TForm1
  2.   Left = 348
  3.   Top = 73
  4.   Width = 170
  5.   Height = 109
  6.   Caption = 'Form1'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   FormStyle = fsStayOnTop
  12.   PixelsPerInch = 96
  13.   OnCreate = FormCreate
  14.   TextHeight = 13
  15.   object DBLookupCombo1: TDBLookupCombo
  16.     Left = 8
  17.     Top = 16
  18.     Width = 145
  19.     Height = 25
  20.     DataField = 'CustNo'
  21.     DataSource = DSOrders
  22.     LookupSource = DSCustomer
  23.     LookupDisplay = 'Company'
  24.     LookupField = 'CustNo'
  25.     TabOrder = 0
  26.   end
  27.   object TblCustomer: TTable
  28.     Active = True
  29.     DatabaseName = 'DBDEMOS'
  30.     TableName = 'CUSTOMER.DB'
  31.     Left = 24
  32.   end
  33.   object DSCustomer: TDataSource
  34.     DataSet = TblCustomer
  35.     Left = 104
  36.   end
  37.   object TblOrders: TTable
  38.     Active = True
  39.     DatabaseName = 'DBDEMOS'
  40.     TableName = 'ORDERS.DB'
  41.     Left = 24
  42.     Top = 40
  43.   end
  44.   object DSOrders: TDataSource
  45.     DataSet = TblOrders
  46.     Left = 104
  47.     Top = 40
  48.   end
  49. end
  50.